home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmfreec / _setup.1 / AHMTLogWindow.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-12-09  |  5.2 KB  |  147 lines

  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTLogWindow.pas' rev: 3.00
  6.  
  7. #ifndef AHMTLogWindowHPP
  8. #define AHMTLogWindowHPP
  9. #include <AHMFreeware.hpp>
  10. #include <Printers.hpp>
  11. #include <Menus.hpp>
  12. #include <StdCtrls.hpp>
  13. #include <ComCtrls.hpp>
  14. #include <ExtCtrls.hpp>
  15. #include <Dialogs.hpp>
  16. #include <Forms.hpp>
  17. #include <Controls.hpp>
  18. #include <Graphics.hpp>
  19. #include <Classes.hpp>
  20. #include <SysUtils.hpp>
  21. #include <Messages.hpp>
  22. #include <Windows.hpp>
  23. #include <SysInit.hpp>
  24. #include <System.hpp>
  25.  
  26. //-- user supplied -----------------------------------------------------------
  27.  
  28. namespace Ahmtlogwindow
  29. {
  30. //-- type declarations -------------------------------------------------------
  31. class DELPHICLASS TAHMLogWindowForm;
  32. class PASCALIMPLEMENTATION TAHMLogWindowForm : public Forms::TForm 
  33. {
  34.     typedef Forms::TForm inherited;
  35.     
  36. __published:
  37.     Comctrls::TRichEdit* RichEdit1;
  38.     Menus::TMainMenu* MainMenu1;
  39.     Menus::TMenuItem* File1;
  40.     Menus::TMenuItem* Edit1;
  41.     Menus::TMenuItem* New1;
  42.     Menus::TMenuItem* Open1;
  43.     Menus::TMenuItem* Save1;
  44.     Menus::TMenuItem* N1;
  45.     Menus::TMenuItem* Print1;
  46.     Menus::TMenuItem* N2;
  47.     Menus::TMenuItem* Exit1;
  48.     Menus::TMenuItem* WordWrap1;
  49.     Dialogs::TPrintDialog* PrintDialog1;
  50.     Dialogs::TOpenDialog* OpenDialog1;
  51.     Dialogs::TSaveDialog* SaveDialog1;
  52.     Menus::TMenuItem* Font1;
  53.     Menus::TMenuItem* N3;
  54.     Dialogs::TFontDialog* FontDialog1;
  55.     Menus::TMenuItem* Background1;
  56.     Dialogs::TColorDialog* ColorDialog1;
  57.     void __fastcall Print1Click(System::TObject* Sender);
  58.     void __fastcall New1Click(System::TObject* Sender);
  59.     void __fastcall Open1Click(System::TObject* Sender);
  60.     void __fastcall Save1Click(System::TObject* Sender);
  61.     void __fastcall Font1Click(System::TObject* Sender);
  62.     void __fastcall WordWrap1Click(System::TObject* Sender);
  63.     void __fastcall Exit1Click(System::TObject* Sender);
  64.     void __fastcall Background1Click(System::TObject* Sender);
  65.     
  66. public:
  67.     Classes::TNotifyEvent aexit;
  68.     Classes::TNotifyEvent aopen;
  69.     Classes::TNotifyEvent asave;
  70. public:
  71.     /* TCustomForm.Create */ __fastcall virtual TAHMLogWindowForm(Classes::TComponent* AOwner) : Forms::
  72.         TForm(AOwner) { }
  73.     /* TCustomForm.CreateNew */ __fastcall TAHMLogWindowForm(Classes::TComponent* AOwner, int Dummy) : 
  74.         Forms::TForm(AOwner, Dummy) { }
  75.     /* TCustomForm.Destroy */ __fastcall virtual ~TAHMLogWindowForm(void) { }
  76.     
  77. public:
  78.     /* TWinControl.CreateParented */ __fastcall TAHMLogWindowForm(HWND ParentWindow) : Forms::TForm(ParentWindow
  79.         ) { }
  80.     
  81. };
  82.  
  83. class DELPHICLASS TAHMLogWindow;
  84. class PASCALIMPLEMENTATION TAHMLogWindow : public Classes::TComponent 
  85. {
  86.     typedef Classes::TComponent inherited;
  87.     
  88. private:
  89.     Ahmfreeware::TAHMAboutFreeStr FAbout;
  90.     System::AnsiString fedcap;
  91.     System::AnsiString ffil;
  92.     Graphics::TColor fbcol;
  93.     Classes::TNotifyEvent fonsave;
  94.     Classes::TNotifyEvent fonexit;
  95.     Classes::TNotifyEvent fonexec;
  96.     Graphics::TFont* ffon;
  97.     bool dN1;
  98.     bool fload;
  99.     TPosition fwpos;
  100.     int fheight;
  101.     int fwidth;
  102.     Forms::TBorderIcons fbord;
  103.     bool freado;
  104.     Graphics::TIcon* fico;
  105.     TWindowState fwstate;
  106.     void __fastcall Setfont(Graphics::TFont* value);
  107.     void __fastcall SetMenuFile(bool value);
  108.     void __fastcall SetBordericons(Forms::TBorderIcons value);
  109.     void __fastcall SetIco(Graphics::TIcon* value);
  110.     
  111. public:
  112.     __fastcall virtual TAHMLogWindow(Classes::TComponent* AOwner);
  113.     __fastcall virtual ~TAHMLogWindow(void);
  114.     bool __fastcall execute(void);
  115.     void __fastcall Log(System::AnsiString value);
  116.     void __fastcall Clear(void);
  117.     
  118. __published:
  119.     __property Ahmfreeware::TAHMAboutFreeStr About = {read=FAbout, write=FAbout};
  120.     __property System::AnsiString LogWindowCaption = {read=fedcap, write=fedcap};
  121.     __property Graphics::TColor LogWindowColor = {read=fbcol, write=fbcol, nodefault};
  122.     __property Graphics::TFont* LogWindowFonts = {read=ffon, write=Setfont};
  123.     __property bool FileMenu = {read=dN1, write=SetMenuFile, nodefault};
  124.     __property System::AnsiString OpenFilename = {read=ffil, write=ffil};
  125.     __property bool OpenFileOnExecute = {read=fload, write=fload, nodefault};
  126.     __property Classes::TNotifyEvent OnExecute = {read=fonexec, write=fonexec};
  127.     __property Classes::TNotifyEvent OnExit = {read=fonexit, write=fonexit};
  128.     __property Classes::TNotifyEvent OnSaveFile = {read=fonsave, write=fonsave};
  129.     __property Forms::TWindowState Windowstate = {read=fwstate, write=fwstate, nodefault};
  130.     __property Forms::TPosition WindowPosition = {read=fwpos, write=fwpos, nodefault};
  131.     __property Forms::TBorderIcons BorderIcons = {read=fbord, write=SetBordericons, nodefault};
  132.     __property int WindowWidth = {read=fwidth, write=fwidth, nodefault};
  133.     __property int WindowHeight = {read=fheight, write=fheight, nodefault};
  134.     __property bool Readonly = {read=freado, write=freado, nodefault};
  135.     __property Graphics::TIcon* LogWindowIcon = {read=fico, write=SetIco};
  136. };
  137.  
  138. //-- var, const, procedure ---------------------------------------------------
  139. extern PACKAGE TAHMLogWindowForm* fvwf;
  140.  
  141. }    /* namespace Ahmtlogwindow */
  142. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  143. using namespace Ahmtlogwindow;
  144. #endif
  145. //-- end unit ----------------------------------------------------------------
  146. #endif    // AHMTLogWindow
  147.